home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Educ / Higher Ed / G-M / MacPhaseExtras.sit / MacPhase Extras / Macros / ListWindows.m < prev    next >
MacBinary  |  1994-02-01  |  1.4 KB  |  [TEXT/DAHN]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Ultima 6 (music/ultima6) ext Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Amiga E Module (other/amigaEModule) ext Unsupported
1% dexvert ECX module (other/ecxModule) ext Unsupported
1% dexvert Maple Common Binary (other/mapleCommonBinary) ext Unsupported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Tue Feb 1 21:30:38 1994, modified Tue Feb 1 21:30:38 1994, creator 'DAHN', type ASCII, 414 bytes "ListWindows.m" , at 0x21e 670 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[DAHN]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 4c 69 73 74 57 69 | 6e 64 6f 77 73 2e 6d 00 |..ListWi|ndows.m.|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 44 41 48 | 4e 01 00 00 00 00 00 00 |.TEXTDAH|N.......|
|00000050| 00 00 00 00 00 01 9e 00 | 00 02 9e a9 74 c0 ce a9 |........|....t...|
|00000060| 74 c0 ce 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 da d7 00 00 |........|........|
|00000080| 6d 61 63 72 6f 20 4c 69 | 73 74 57 69 6e 64 6f 77 |macro Li|stWindow|
|00000090| 73 3b 0d 0d 76 61 72 0d | 09 62 6f 6f 6c 65 61 6e |s;..var.|.boolean|
|000000a0| 20 3a 20 65 6d 70 74 79 | 3b 0d 09 73 74 72 32 35 | : empty|;..str25|
|000000b0| 35 20 3a 20 6e 65 78 74 | 2c 74 6f 70 2c 6c 69 73 |5 : next|,top,lis|
|000000c0| 74 3b 0d 0d 62 65 67 69 | 6e 0d 09 44 69 73 70 6f |t;..begi|n..Dispo|
|000000d0| 73 65 55 6e 63 6c 6f 73 | 65 3b 0d 09 6c 69 73 74 |seUnclos|e;..list|
|000000e0| 3a 3d 27 57 69 6e 64 6f | 77 20 4c 69 73 74 27 0d |:='Windo|w List'.|
|000000f0| 09 4e 65 77 54 65 78 74 | 28 6c 69 73 74 29 3b 0d |.NewText|(list);.|
|00000100| 09 53 65 6c 65 63 74 44 | 61 74 61 28 6c 69 73 74 |.SelectD|ata(list|
|00000110| 29 3b 0d 09 46 72 6f 6e | 74 44 61 74 61 28 74 6f |);..Fron|tData(to|
|00000120| 70 2c 27 64 61 74 61 2b | 74 65 78 74 27 29 3b 0d |p,'data+|text');.|
|00000130| 09 6e 65 78 74 3a 3d 4e | 65 78 74 44 61 74 61 28 |.next:=N|extData(|
|00000140| 74 6f 70 2c 27 64 61 74 | 61 2b 74 65 78 74 27 29 |top,'dat|a+text')|
|00000150| 3b 0d 09 65 6d 70 74 79 | 3a 3d 43 6d 70 53 74 72 |;..empty|:=CmpStr|
|00000160| 28 6e 65 78 74 2c 3d 2c | 27 27 29 3b 0d 09 69 66 |(next,=,|'');..if|
|00000170| 28 21 65 6d 70 74 79 29 | 0d 09 09 72 65 70 65 61 |(!empty)|...repea|
|00000180| 74 0d 09 09 09 77 72 69 | 74 65 6c 6e 28 6c 69 73 |t....wri|teln(lis|
|00000190| 74 2c 6e 65 78 74 29 3b | 0d 09 09 09 6e 65 78 74 |t,next);|....next|
|000001a0| 3a 3d 4e 65 78 74 44 61 | 74 61 28 6e 65 78 74 2c |:=NextDa|ta(next,|
|000001b0| 27 64 61 74 61 2b 74 65 | 78 74 27 29 3b 0d 09 09 |'data+te|xt');...|
|000001c0| 09 65 6d 70 74 79 3a 3d | 43 6d 70 53 74 72 28 6e |.empty:=|CmpStr(n|
|000001d0| 65 78 74 2c 3d 2c 27 27 | 29 3b 0d 09 09 75 6e 74 |ext,=,''|);...unt|
|000001e0| 69 6c 28 65 6d 70 74 79 | 29 3b 0d 09 65 6c 73 65 |il(empty|);..else|
|000001f0| 69 66 0d 09 09 77 72 69 | 74 65 6c 6e 28 6c 69 73 |if...wri|teln(lis|
|00000200| 74 2c 27 4e 6f 20 57 69 | 6e 64 6f 77 73 27 29 3b |t,'No Wi|ndows');|
|00000210| 0d 09 65 6e 64 69 66 3b | 0d 65 6e 64 3b 0d 00 00 |..endif;|.end;...|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 01 00 00 00 02 6c | 00 00 01 6c 00 00 00 32 |.......l|...l...2|
|00000290| 6f 6c 64 65 72 2c 20 30 | 29 3b 0d 09 09 72 61 64 |older, 0|);...rad|
|000002a0| 69 75 73 20 3a 3d 20 73 | 71 72 74 28 73 71 72 28 |ius := s|qrt(sqr(|
|000002b0| 0d 4c 69 73 74 57 69 6e | 64 6f 77 73 2e 6d 02 00 |.ListWin|dows.m..|
|000002c0| 00 00 54 45 58 54 44 41 | 48 4e 01 00 00 28 00 00 |..TEXTDA|HN...(..|
|000002d0| 00 00 54 45 58 54 44 41 | 48 4e 01 00 00 28 00 00 |..TEXTDA|HN...(..|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 a9 44 b7 fb 00 00 | 01 9e 00 00 02 9e 2d 20 |...D....|......- |
|00000300| 64 61 74 61 59 2c 20 64 | 61 74 61 58 20 2d 20 63 |dataY, d|ataX - c|
|00000310| 65 6e 74 65 72 58 29 20 | 2f 20 70 69 3b 0d 09 09 |enterX) |/ pi;...|
|00000320| 69 66 20 4f 70 74 69 6f | 6e 50 72 65 73 73 65 64 |if Optio|nPressed|
|00000330| 20 74 68 65 6e 0d 09 09 | 09 62 65 67 69 6e 0d 09 | then...|.begin..|
|00000340| 09 09 09 53 68 6f 77 44 | 61 74 61 49 6e 66 6f 28 |...ShowD|ataInfo(|
|00000350| 74 68 65 44 61 74 61 29 | 3b 0d 09 09 09 09 65 78 |theData)|;.....ex|
|00000360| 69 74 28 44 61 74 61 4b | 69 6e 64 49 6e 66 6f 29 |it(DataK|indInfo)|
|00000370| 3b 0d 09 09 09 65 6e 64 | 3b 0d 09 09 61 73 70 65 |;....end|;...aspe|
|00000380| 00 00 01 68 00 00 00 00 | 00 00 00 78 00 0f 02 30 |...h....|...x...0|
|00000390| 00 ec 00 06 00 00 01 8e | 00 00 01 8e 00 00 00 08 |........|........|
|000003a0| 00 04 00 09 00 00 06 4d | 6f 6e 61 63 6f 00 00 00 |.......M|onaco...|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 04 00 | 00 05 00 00 00 48 00 48 |........|.....H.H|
|000003f0| 00 00 00 00 02 db 02 40 | ff e7 ff ee 02 ff 02 52 |.......@|.......R|
|00000400| 1f 03 05 28 03 fc 00 01 | 00 00 01 2c 01 2c 00 00 |...(....|...,.,..|
|00000410| 00 00 0b e7 09 60 01 2c | 00 2d 05 a0 5e ec 00 26 |.....`.,|.-..^..&|
|00000420| 04 01 01 01 00 18 00 01 | 27 0f 00 01 00 01 00 00 |........|'.......|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 64 00 00 |........|.....d..|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 01 00 01 02 00 00 00 00 |........|........|
|00000460| 00 04 00 09 00 00 06 4d | 6f 6e 61 63 6f 08 00 00 |.......M|onaco...|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 04 | 01 00 00 01 00 00 00 00 |........|........|
|000004b0| 00 01 01 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 01 00 01 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|000004f0| 00 00 02 6c 00 00 01 6c | 00 00 00 32 00 4f 7e cc |...l...l|...2.O~.|
|00000500| 0d 3a 00 00 00 1c 00 32 | 00 00 42 42 53 52 00 00 |.:.....2|..BBSR..|
|00000510| 00 0a 02 50 ff ff 00 00 | 00 00 00 4f 76 dc 00 00 |...P....|...Ov...|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+